home *** CD-ROM | disk | FTP | other *** search
/ ADA Programming Guide / ADA Programming Guide.iso / ada_gnu / include / stdarg.h < prev    next >
C/C++ Source or Header  |  1996-01-30  |  5KB  |  160 lines
  1. /* stdarg.h for GNU.
  2.    Note that the type used in va_arg is supposed to match the
  3.    actual type **after default promotions**.
  4.    Thus, va_arg (..., short) is not valid.  */
  5.  
  6. #ifndef _STDARG_H
  7. #ifndef _ANSI_STDARG_H_
  8. #ifndef __need___va_list
  9. #define _STDARG_H
  10. #define _ANSI_STDARG_H_
  11. #endif /* not __need___va_list */
  12. #undef __need___va_list
  13.  
  14. #ifdef __clipper__
  15. #include <va-clipper.h>
  16. #else
  17. #ifdef __m88k__
  18. #include <va-m88k.h>
  19. #else
  20. #ifdef __i860__
  21. #include <va-i860.h>
  22. #else
  23. #ifdef __hppa__
  24. #include <va-pa.h>
  25. #else
  26. #ifdef __mips__
  27. #include <va-mips.h>
  28. #else
  29. #ifdef __sparc__
  30. #include <va-sparc.h>
  31. #else
  32. #ifdef __i960__
  33. #include <va-i960.h>
  34. #else
  35. #ifdef __alpha__
  36. #include <va-alpha.h>
  37. #else
  38. #if defined (__H8300__) || defined (__H8300H__)
  39. #include <va-h8300.h>
  40. #else
  41.  
  42. /* Define __gnuc_va_list.  */
  43.  
  44. #ifndef __GNUC_VA_LIST
  45. #define __GNUC_VA_LIST
  46. #if defined(__svr4__) || defined(_AIX) || defined(_M_UNIX)
  47. typedef char *__gnuc_va_list;
  48. #else
  49. typedef void *__gnuc_va_list;
  50. #endif
  51. #endif
  52.  
  53. /* Define the standard macros for the user,
  54.    if this invocation was from the user program.  */
  55. #ifdef _STDARG_H
  56.  
  57. /* Amount of space required in an argument list for an arg of type TYPE.
  58.    TYPE may alternatively be an expression whose type is used.  */
  59.  
  60. #if defined(sysV68)
  61. #define __va_rounded_size(TYPE)  \
  62.   (((sizeof (TYPE) + sizeof (short) - 1) / sizeof (short)) * sizeof (short))
  63. #else
  64. #define __va_rounded_size(TYPE)  \
  65.   (((sizeof (TYPE) + sizeof (int) - 1) / sizeof (int)) * sizeof (int))
  66. #endif
  67.  
  68. #define va_start(AP, LASTARG)                         \
  69.  (AP = ((__gnuc_va_list) __builtin_next_arg (LASTARG)))
  70.  
  71. #undef va_end
  72. void va_end (__gnuc_va_list);        /* Defined in libgcc.a */
  73. #define va_end(AP)
  74.  
  75. /* We cast to void * and then to TYPE * because this avoids
  76.    a warning about increasing the alignment requirement.  */
  77.  
  78. #if defined (__arm__) || defined (__i386__) || defined (__i860__) || defined (__ns32000__) || defined (__vax__)
  79. /* This is for little-endian machines; small args are padded upward.  */
  80. #define va_arg(AP, TYPE)                        \
  81.  (AP = (__gnuc_va_list) ((char *) (AP) + __va_rounded_size (TYPE)),    \
  82.   *((TYPE *) (void *) ((char *) (AP) - __va_rounded_size (TYPE))))
  83. #else /* big-endian */
  84. /* This is for big-endian machines; small args are padded downward.  */
  85. #define va_arg(AP, TYPE)                        \
  86.  (AP = (__gnuc_va_list) ((char *) (AP) + __va_rounded_size (TYPE)),    \
  87.   *((TYPE *) (void *) ((char *) (AP) - ((sizeof (TYPE) < 4        \
  88.                      ? sizeof (TYPE)        \
  89.                      : __va_rounded_size (TYPE))))))
  90. #endif /* big-endian */
  91. #endif /* _STDARG_H */
  92.  
  93. #endif /* not h8300 */
  94. #endif /* not alpha */
  95. #endif /* not i960 */
  96. #endif /* not sparc */
  97. #endif /* not mips */
  98. #endif /* not hppa */
  99. #endif /* not i860 */
  100. #endif /* not m88k */
  101. #endif /* not clipper */
  102.  
  103. #ifdef _STDARG_H
  104. /* Define va_list, if desired, from __gnuc_va_list. */
  105. /* We deliberately do not define va_list when called from
  106.    stdio.h, because ANSI C says that stdio.h is not supposed to define
  107.    va_list.  stdio.h needs to have access to that data type, 
  108.    but must not use that name.  It should use the name __gnuc_va_list,
  109.    which is safe because it is reserved for the implementation.  */
  110.  
  111. #ifdef _HIDDEN_VA_LIST  /* On OSF1, this means varargs.h is "half-loaded".  */
  112. #undef _VA_LIST
  113. #endif
  114.  
  115. #ifdef _BSD_VA_LIST
  116. #undef _BSD_VA_LIST
  117. #endif
  118.  
  119. #ifdef __svr4__
  120. /* SVR4.2 uses _VA_LIST for an internal alias for va_list,
  121.    so we must avoid testing it and setting it here.
  122.    SVR4 uses _VA_LIST as a flag in stdarg.h, but we should
  123.    have no conflict with that.  */
  124. #ifndef _VA_LIST_
  125. #define _VA_LIST_
  126. #ifdef __i860__
  127. #ifndef _VA_LIST
  128. #define _VA_LIST va_list
  129. #endif
  130. #endif /* __i860__ */
  131. typedef __gnuc_va_list va_list;
  132. #endif /* _VA_LIST_ */
  133. #else /* not __svr4__ */
  134.  
  135. /* The macro _VA_LIST_ is the same thing used by this file in Ultrix.
  136.    But on BSD NET2 we must not test or define or undef it.
  137.    (Note that the comments in NET 2's ansi.h
  138.    are incorrect for _VA_LIST_--see stdio.h!)  */
  139. #if !defined (_VA_LIST_) || defined (__BSD_NET2__) || defined (____386BSD____) || defined (__bsdi__) || defined (__FreeBSD__)
  140. /* The macro _VA_LIST is used in SCO Unix 3.2.  */
  141. #ifndef _VA_LIST
  142. /* The macro _VA_LIST_T_H is used in the Bull dpx2  */
  143. #ifndef _VA_LIST_T_H
  144. #define _VA_LIST_T_H
  145. #if !(defined (__BSD_NET2__) || defined (____386BSD____) || defined (__bsdi__) || defined (__FreeBSD__))
  146. #define _VA_LIST_
  147. #endif
  148. #define _VA_LIST
  149. typedef __gnuc_va_list va_list;
  150. #endif /* not _VA_LIST_T_H */
  151. #endif /* not _VA_LIST */
  152. #endif /* not _VA_LIST_ */
  153.  
  154. #endif /* not __svr4__ */
  155.  
  156. #endif /* _STDARG_H */
  157.  
  158. #endif /* not _ANSI_STDARG_H_ */
  159. #endif /* not _STDARG_H */
  160.